﻿Imports Encryptor.My

<Assembly: CLSCompliant(True)> 
Public Class logDecrypt
    Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click
        If PasswordTextBox.Text = MySettings.Default.password Then
            PasswordTextBox.Text = Nothing
            Me.DialogResult = Windows.Forms.DialogResult.OK
            Me.Close()
        Else
            PasswordTextBox.Text = Nothing
            Me.DialogResult = Windows.Forms.DialogResult.Abort
        End If
    End Sub

    Private Sub Cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel.Click
        Me.DialogResult = Windows.Forms.DialogResult.Cancel
        PasswordTextBox.Text = Nothing
        Me.Close()
        frmCrypto.Focus()
    End Sub

    Private Sub logDecrypt_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        PasswordTextBox.Focus()
    End Sub
End Class
